home *** CD-ROM | disk | FTP | other *** search
/ DS-CD ROM 2 1993 August / DS CD-ROM 2.Ausgabe (August 1993).iso / programm / ds0257 / install.bat < prev    next >
DOS Batch File  |  1992-02-25  |  10KB  |  348 lines
  1. @ECHO OFF
  2. REM ----------------
  3. REM INSTALL V1.20 - Batch-Datei zum Installieren von Lib4A86
  4. REM (c) Bernd Schemmer 1992
  5. REM ----------------
  6. REM :: Für 4DOS 3.02 auf BTM umschalten!
  7. IF %@eval[2+2] == 4 LOADBTM ON
  8. CLS
  9. REM ::  Ausgabe des Logos
  10. ECHO. ┌─────────────────────────────────────────────────────────────────┐
  11. ECHO. │ INSTALL.BAT -  Batchdatei zum Entpacken der Archive von Lib4A86 │
  12. ECHO. └─────────────────────────────────────────────────────────────────┘
  13. ECHO.
  14. REM :: Testen, ob die Datei von der richtigen Diskette gestartet wurde
  15. IF EXIST START.DOC GOTO DiskOK
  16. ECHO. * INSTALL fataler Fehler: Falsche Start-Diskette benutzt!
  17. ECHO.
  18. ECHO. * INSTALL.BAT kann nur von der Original-Diskette der Shareware-
  19. ECHO. * Version oder der ERSTEN Diskette der Vollversion (bzw. einer
  20. ECHO. * Kopie einer dieser beiden Disketten) gestartet werden!
  21. ECHO. *
  22. ECHO. * Beende INSTALL
  23. ECHO.
  24. GOTO ENDE
  25. :DiskOK
  26. ECHO. Initialisiere die Variablen. Bitte warten, das dauert etwas ...
  27. ECHO. (evtl. Fehlermeldungen wie 'Kein Platz mehr im Umgebungsbereich'
  28. ECHO.  können ignoriert werden, da sie von INSTALL behandelt werden!)
  29. ECHO.
  30. REM :: Voreinstellungen für die Parameter
  31. SET Z_LW=C:
  32. SET Q_LW=A:
  33. SET MKDIRS=J
  34. REM :: Environment-Speicher belegen
  35. SET EXT=xxxxxxxxxxxxx
  36. SET RETADR=%EXT%
  37. SET RETADR1=%EXT%
  38. SET FILE=%EXT%
  39. REM ::  Auswerten der Parameter
  40. IF %1. == ?.  GOTO HELP
  41. IF %1. == /?. GOTO HELP
  42. IF %1. == -?. GOTO HELP
  43. IF NOT %1. == . SET Z_LW=%1
  44. IF NOT %2. == . SET Q_LW=%2
  45. IF NOT %3. == . SET MKDIRS=%3
  46. IF NOT %4. == . GOTO SwitchError1
  47.  
  48. REM :: Testen, ob die Environment-Variablen erstellt werden konnten
  49. SET TEST=****TEST****
  50. IF NOT %TEST%. == ****TEST****. GOTO EnvError
  51. SET TEST=
  52.  
  53. REM :: Parameter überprüfen
  54. IF %Z_LW%. == C:. GOTO LwOK1
  55. IF %Z_LW%. == c:. GOTO LwOK1
  56. IF %Z_LW%. == D:. GOTO LwOK1
  57. IF %Z_LW%. == d:. GOTO LwOK1
  58. GOTO ZWLError
  59. :LwOK1
  60. IF %Q_LW%. == A:. GOTO LwOK2
  61. IF %Q_LW%. == a:. GOTO LwOK2
  62. IF %Q_LW%. == B:. GOTO LwOK2
  63. IF %Q_LW%. == b:. GOTO LwOK2
  64. GOTO QWLError
  65. :LwOK2
  66. IF %MKDIRS%. == J. GOTO SwitchOK
  67. IF NOT %MKDIRS%. == N. GOTO SwitchError
  68. :SwitchOK
  69. CLS
  70. REM ::  Ausgabe des Logos
  71. ECHO. ┌─────────────────────────────────────────────────────────────────┐
  72. ECHO. │ INSTALL.BAT -  Batchdatei zum Entpacken der Archive von Lib4A86 │
  73. ECHO. └─────────────────────────────────────────────────────────────────┘
  74. ECHO.
  75. GOTO S%MKDIRS%
  76.  
  77. :SJ
  78. ECHO. INSTALL erstellt im (akt.) Verzeichnis (von)
  79. CD %Z_LW%
  80. ECHO. folgende Verzeichnisstruktur:
  81. ECHO.                                 Inhalt
  82. ECHO.    »akt. Dir«            allgemeine .DOC-Dateien und SHOW.COM
  83. ECHO.   ────────────┐
  84. ECHO.               ├──\LIB    *.LIB, *.BIB und *.MAB
  85. ECHO.               │
  86. ECHO.               ├──\DEMO   .DEM- u. .MAB-Dateien zu den Dateien aus ..\LIB
  87. ECHO.               │
  88. ECHO.               ├──\DOC    .DOC-Dateien zu den Dateien aus ..\LIB
  89. ECHO.               │
  90. ECHO.               ├──\UTIL   Utilities aus Lib4A86 und die Dokumentation dazu
  91. ECHO.          -- nur in der Vollversion: --
  92. ECHO.               └──\INC    kommentierte Quelltexte der Dateien aus ..\LIB
  93. GOTO S00
  94.  
  95. :SN
  96. ECHO.
  97. ECHO. Die Directorys LIB, DEMO, DOC und UTIL (und evtl. INC) existieren
  98. ECHO. bereits im Directory
  99. CD %Z_LW%
  100.  
  101. :S00
  102. ECHO.                                  ┌────┐                  ┌────┐
  103. ECHO. Installiere Lib4A86 vom Laufwerk │ %Q_LW% │ aus ins Laufwerk │ %Z_LW% │.
  104. ECHO.                                  └────┘                  └────┘
  105. ECHO.
  106. ECHO. Soll ich fortfahren (CTRL-C für Abbruch, INSTALL ? für Hilfe)?
  107. PAUSE >NUL
  108. CLS
  109. ECHO. Installiere Lib4A86 im akt. Directory des Laufwerkes %Z_LW% ...
  110. ECHO.
  111. SET EXT=.EXE
  112.  
  113. copy %Q_LW%show.com %Z_LW%
  114. REM :: Entpacken der allgemeinen Dokumentation ...
  115. SET FILE=README
  116. SET RETADR=S2
  117. :S2
  118. IF NOT EXIST %Q_LW%%FILE%%EXT%  GOTO AskUser1
  119. ECHO.
  120. ECHO. * Entpacke das Archiv %FILE%%EXT% ...
  121. %Z_LW%
  122. %Q_LW%%FILE%%EXT%
  123. IF ERRORLEVEL == 1 GOTO ERROR
  124. ECHO. * %FILE%%EXT% entpackt.
  125.  
  126. REM :: Entpacken der Libary-Files ...
  127. SET FILE=LIB
  128. SET RETADR1=M1
  129. GOTO MKFiles%MKDIRS%
  130. :M1
  131.  
  132. REM :: Entpacken der .DOC-Files ...
  133. SET FILE=DOC
  134. SET RETADR1=M2
  135. GOTO MKFiles%MKDIRS%
  136. :M2
  137.  
  138. REM :: Entpacken der Demo-Files ...
  139. SET FILE=DEMO
  140. SET RETADR1=M3
  141. GOTO MKFiles%MKDIRS%
  142. :M3
  143. ECHO. * Kopiere die .MAC- und .MAP-Dateien ins Directory DEMO ...
  144. %Z_LW%
  145. copy LIB\*.MA? DEMO\*.* >NUL
  146.  
  147. REM :: Entpacken der Utilities ...
  148. SET FILE=UTIL
  149. SET RETADR1=M4
  150. GOTO MKFiles%MKDIRS%
  151. :M4
  152. SET FILE=INC
  153. IF EXIST %Q_LW%%FILE%%EXT% GOTO M5_1
  154. ECHO.
  155. ECHO. * Falls Sie die Vollversion von Lib4A86 auf 360-K-Disketten
  156. ECHO. * besitzen, jetzt bitte die 2. Diskette einlegen und eine
  157. ECHO. * Taste drücken.
  158. ECHO.
  159. ECHO. * In allen anderen Fällen einfach nur eine Taste drücken ...
  160. PAUSE >NUL
  161. ECHO.
  162. REM :: Testen, ob es sich um eine Vollversion handelt ...
  163. IF NOT EXIST %Q_LW%%FILE%%EXT% GOTO M5
  164. :M5_1
  165. SET RETADR1=M5
  166. GOTO MKFiles%MKDIRS%
  167. :M5
  168.  
  169. REM :: Hilfsvariablen Löschen
  170. SET RETADR=
  171. SET RETADR1=
  172. SET FILE=
  173. SET EXT=
  174. ECHO.
  175. ECHO. Lib4A86 ist nun installiert.
  176. ECHO.
  177. ECHO. Beachten Sie bitte, daß Sie vor der Nutzung von Lib4A86 erst die
  178. ECHO. Environment-Variablen A86 und A86LIB (und evtl. Lib4A86) definieren
  179. ECHO. müssen (siehe 'Lib4A86.PRT').
  180. ECHO.
  181. REM :: Ins Ziellaufwerk umschalten
  182. %Z_LW%
  183. REM :: Hilfsvariablen löschen
  184. SET Z_LW=
  185. SET Q_LW=
  186. SET MKDIRS=
  187.  
  188. ECHO. Möchten Sie sich nun die allgemeine Dokumentation zu Lib4A86 ansehen?
  189. ECHO.
  190. ECHO. Bitte eine Taste drücken ... (CTRL-C für Abbruch)
  191. PAUSE >NUL
  192. show Lib4A86.prt history.doc
  193. GOTO ENDE
  194.  
  195. REM ----------------
  196. REM Unterroutine zum Entpacken der Archive
  197. REM Eingabe: %FILE%       = Name des Archivs
  198. REM          %EXT%        = Extension des Archivs
  199. REM          %RETADR1% = Marke, an der die Programmausführung fort-
  200. REM                         geführt werden soll
  201. REM
  202. :MKFilesJ
  203. ECHO.
  204. ECHO. * Erstelle das Directory %FILE% ..
  205. MD %Z_LW%%FILE% >NUL
  206.  
  207. :MKFilesN
  208. COPY %Q_LW%START.DOC %Z_LW%%FILE%\*.* >NUL
  209. IF NOT EXIST %Z_LW%%FILE%\START.DOC GOTO DirectoryError
  210. DEL %Z_LW%%FILE%\START.DOC >NUL
  211. %Z_LW%
  212. CD %Z_LW%%FILE% >NUL
  213. SET RETADR=S4
  214. :S4
  215. IF NOT EXIST %Q_LW%%FILE%%EXT%  GOTO AskUser1
  216. ECHO.
  217. ECHO. * Entpacke das Archiv %FILE%%EXT% ...
  218. %Q_LW%%FILE%%EXT%
  219. IF ERRORLEVEL == 1 GOTO ERROR
  220. CD .. >NUL
  221. ECHO.
  222. ECHO. * %FILE%%EXT% entpackt.
  223. GOTO %RETADR1%
  224.  
  225. REM ----------------
  226. :DirectoryError
  227. ECHO.
  228. ECHO. * Fehler: Directory %FILE% existiert nicht bzw. konnte nicht
  229. ECHO. *         erstellt werden!
  230. ECHO.
  231. GOTO EENDE
  232.  
  233. REM ----------------
  234. :ERROR
  235. CD .. >NUL
  236. ECHO.
  237. ECHO. * Fehler beim Entpacken des Archivs %Q_LW%%FILE%%EXT% aufgetreten!
  238. ECHO.
  239. GOTO EENDE
  240.  
  241. REM ----------------
  242. :EnvError
  243. ECHO.
  244. ECHO. * Fehler: Nicht genügend Platz im Environment
  245. ECHO.
  246. ECHO. Zur Ausführung dieser Datei müssen Sie den Platz im Environment
  247. ECHO. erhöhen. Falls Ihr Kommando-Interpreter der COMMAND.COM ist
  248. ECHO. müssen Sie hierzu in der Datei CONFIG.SYS die Zeile
  249. ECHO.
  250. ECHO. SHELL=d:\COMMAND.COM /e:nnnnn /p
  251. ECHO.
  252. ECHO. einfügen oder editieren. Hierbei ist 'd:' das Verzeichnis, in dem
  253. ECHO. der COMMAND.COM steht und 'nnnnn' die Größe des Environments in Byte.
  254. ECHO. (siehe auch DOS-Handbuch)
  255. ECHO.
  256. ECHO. Falls Sie diese Änderung des Systems nicht wünschen, können Sie INSTALL
  257. ECHO. auch folgendermaßen aufrufen:
  258. ECHO.
  259. ECHO. COMMAND /e:2048 /C install.bat {parameter für install}
  260. ECHO.
  261. IF %COMSPEC%. == . GOTO ENDE
  262. ECHO. Drücken Sie eine Taste zur Ausführung dieser Datei über den Befehl
  263. ECHO.
  264. ECHO. %COMSPEC% /e:2048 /C install.bat %1 %2 %3
  265. ECHO.
  266. ECHO. oder CTRL-C für Abbruch ...
  267. PAUSE >NUL
  268. %COMSPEC% /e:2048 /C install.bat %1 %2 %3
  269. GOTO Ende
  270. :QWLError
  271. ECHO.
  272. ECHO. * Fehler: Als zweiter Parameter (%2%) ist nur A: oder B: erlaubt!
  273. GOTO EEnde
  274. REM ----------------
  275. :ZWLError
  276. ECHO.
  277. ECHO. * Fehler: Als erster Parameter (%1%) ist nur D: oder C: erlaubt!
  278. GOTO EEnde
  279. REM ----------------
  280. :SwitchError
  281. ECHO.
  282. ECHO. * Fehler: Als dritter Parameter (%3) ist nur J oder N erlaubt!
  283. GOTO EEnde
  284. REM ----------------
  285. :SwitchError1
  286. ECHO.
  287. ECHO. * Fehler: Zuviele Parameter angegeben!
  288. GOTO EEnde
  289.  
  290. REM ----------------
  291. REM Unterroutine zur Ausgabe einer Fehlermeldung und zum Lesen einer Taste
  292. REM Eingabe:  %FILE%      = Name des Archivs
  293. REM           %EXT%       = Extension des Archivs
  294. REM           %RETADR%    = Marke, an der die Programmausführung fort-
  295. REM                         geführt werden soll.
  296. :AskUser1
  297. ECHO. * INSTALL - FEHLER *
  298. ECHO.
  299. ECHO. Kann die Datei %FILE%%EXT% im Laufwerk %Q_LW% nicht finden.
  300. ECHO. Bitte die richtige Diskette ins Laufwerk %Q_LW% einlegen
  301. ECHO. und eine Taste drücken (CTRL-C für Abbruch) ...
  302. PAUSE >NUL
  303. ECHO.
  304. GOTO %RETADR%
  305.  
  306. REM ----------------
  307. :HELP
  308. CLS
  309. ECHO. ┌─────────────────────────────────────────────────────────────────┐
  310. ECHO. │ INSTALL.BAT -  Batchdatei zum Entpacken der Archive von Lib4A86 │
  311. ECHO. └─────────────────────────────────────────────────────────────────┘
  312. ECHO.
  313. ECHO. Aufruf:  INSTALL {ziellaufwerk} {quelllaufwerk} {J ODER N}
  314. ECHO.
  315. ECHO.          mit: Ziellaufwerk  = Laufwerk, auf dem die Dateien entpackt
  316. ECHO.                               werden sollen. Mögliche Angaben: C: oder D:
  317. IF NOT "%Z_LW%" == "" ECHO.                               (Voreinstellung: %Z_LW%)
  318. ECHO.               Quelllaufwerk = Laufwerk, in dem die Archive von Lib4A86
  319. ECHO.                               sind. Mögliche Angaben: A: oder B:
  320. IF NOT "%Q_LW%" == "" ECHO.                               (Voreinstellung: %Q_LW%)
  321. ECHO.               N             = Directorys nicht erstellen, da sie schon
  322. ECHO.                               vorhanden sind.
  323. ECHO.        ODER   J             = Directorys erstellen, da sie noch nicht
  324. ECHO.                               vorhanden sind.
  325. IF NOT "MKDIRS" == "" ECHO.                               (Voreinstellung: %MKDIRS%)
  326. ECHO.
  327. ECHO. Beispiel:  INSTALL D: B: J
  328. ECHO.              - Installieren von Lib4A86 im akt. Directory des Laufwerks
  329. ECHO.                D:, wobei die Diskette mit den Archiven im Laufwerk B:
  330. ECHO.                liegt. Die Directorys werden explizit erstellt.
  331. ECHO.
  332. GOTO ENDE
  333. :EENDE
  334. ECHO. (INSTALL ? für Hilfe)
  335. ECHO.
  336. ECHO. Beende die Ausführung von INSTALL.
  337. ECHO.
  338. :ENDE
  339. REM :: Löschen der verwendeten Environment-Variablen ...
  340. SET RETADR=
  341. SET RETADR1=
  342. SET FILE=
  343. SET EXT=
  344. SET Z_LW=
  345. SET Q_LW=
  346. SET MKDIRS=
  347.  
  348.